home *** CD-ROM | disk | FTP | other *** search
/ NeXTSTEP 3.2 for Intel / NeXTSTEP 3.2 for Intel.iso / NextLibrary / Fonts / Ohlfs.font / Ohlfs < prev    next >
Encoding:
Text File  |  1993-08-20  |  518 b   |  24 lines
  1. %!PS-AdobeFont-1.0: Ohlfs 001.005
  2. %%CreationDate: Fri Apr 29 00:55:51 PDT 1988
  3. /Courier findfont
  4. dup length 1 add dict /keithdict exch def
  5. { % Is it the FontName entry?
  6.   1 index /FontName eq
  7.   { % For the old FontName, substitute the string 'Ohlfs'
  8.     pop pop
  9.     keithdict /FontName /Ohlfs put
  10.   }
  11.   { % Is it the FID entry?
  12.     1 index dup /FID ne exch /UniqueID ne and
  13.     {keithdict 3 1 roll put}
  14.     {pop pop}
  15.     ifelse
  16.   }
  17.   ifelse
  18. }
  19. forall
  20. keithdict /UniqueID 4624113 put
  21. /Ohlfs keithdict definefont pop
  22.   
  23.  
  24.